From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 26 Dec 2006 02:54:41 +0000 (+0000)
Subject: (fill-paragraph): Check for a minibuffer
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~3169
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=3bfdcfa893ecdf3005471e79a9a630dc6ef5caf2;p=emacs.git

(fill-paragraph): Check for a minibuffer
rather than for being in a minibuffer window.
---

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 3fec7a31b9f..e3250a6f710 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -762,7 +762,7 @@ If `fill-paragraph-function' is nil, return the `fill-prefix' used for filling."
 		 (list (if current-prefix-arg 'full))))
   ;; First try fill-paragraph-function.
   (or (and (or fill-paragraph-function
-	       (and (window-minibuffer-p (selected-window))
+	       (and (minibufferp (current-buffer))
 		    (= 1 (point-min))))
 	   (let ((function (or fill-paragraph-function
 			       ;; In the minibuffer, don't count the width